(ns com.yawmark.euler.clj.e3
    (:use clojure.test)
    (:use com.yawmark.euler.clj.core))

(is (= #{5 7 13 29} (prime-factors-of 13195)))

(defn euler-3
      "The prime factors of 13195 are 5, 7, 13 and 29.
      What is the largest prime factor of the number 600851475143?"
      []
      (reduce max (prime-factors-of 600851475143))) 

(println (time (euler-3)))
